home *** CD-ROM | disk | FTP | other *** search
/ PC-SIG: Games / PC-SIG Games (PC-SIG).iso / ENT / DISK0633.ZIP / HELPPLUS.BAS (.txt) < prev    next >
Encoding:
GW-BASIC  |  1979-12-31  |  11.8 KB  |  318 lines
  1. 10  SCREEN 1
  2. 11  CLS:KEY OFF
  3. 20  PRINT"****************************************";
  4. 30  PRINT"Instructions: Draw Plus
  5. 40  PRINT"****************************************";
  6. 50  PRINT
  7. 60  PRINT"1. Draw Plus terms"
  8. 70  PRINT"2. Draw Plus instructions"
  9. 81  PRINT"3. Draw Plus program"
  10. 83  PRINT"4. Hard Copy of Draw Plus terms and        instructions"
  11. 90  LOCATE 22,1:LINE INPUT "Choose a number: #";A$
  12. 100  A=VAL(A$)
  13. 110  IF A=1 THEN 1000
  14. 120  IF A=2 THEN 2000
  15. 140  IF A=3 THEN RUN"drawplus"
  16. 151  IF A=4 THEN 11000
  17. 160  BEEP:GOTO 90
  18. 1000  CLS
  19. 1010  PRINT"Draw Plus terms: TOOLS box"
  20. 1020  PRINT
  21. 1030  PRINT"DRAW: pixel by pixel art"
  22. 1040  PRINT:PRINT"FATBRUSH: solid square of pixels.  Size"
  23. 1050  PRINT"set by BRUSH SIZE."
  24. 1060  PRINT:PRINT"AIRBRUSH: random pixel by pixel art "
  25. 1070  PRINT"spread in a square area which size is "
  26. 1080  PRINT"set by BRUSH SIZE."
  27. 1090  PRINT:PRINT"CIRCLE: draws a circle."
  28. 1100  PRINT:PRINT"LINE: draws a line between two points."
  29. 1110  PRINT:PRINT"BOX: draws a box."
  30. 1120  PRINT:PRINT"Note: all above items color is set by"
  31. 1130  PRINT"LINE COLOR."
  32. 1140  PRINT:PRINT"PAINT: fills in area with border color "
  33. 1150  PRINT"set by LINE COLOR and fill color set by"
  34. 1160  PRINT"PAINT COLOR."
  35. 1170  LOCATE 25,11:PRINT"Press <SPACE BAR>";:LOCATE 1,1
  36. 1180  A$=INKEY$:IF A$<>" " THEN 1180
  37. 1190  CLS
  38. 1200  PRINT"Draw Plus terms: SCREEN box"
  39. 1210  PRINT:PRINT"UNDO: restores the screen as it was"
  40. 1220  PRINT"before you made any changes."
  41. 1240  PRINT:PRINT"LOAD: loads an image from the disk. The"
  42. 1250  PRINT"image must have an extention of PIC."
  43. 1260  PRINT:PRINT"SAVE: stores an image to the disk.  The"
  44. 1270  PRINT"filename will have an extention of PIC."
  45. 1290  PRINT:PRINT"CLEAR: clears the screen.  Warning: "
  46. 1300  PRINT"once the image is erased, you can't UNDO";
  47. 1310  PRINT"it."
  48. 1320  PRINT:PRINT"INVERSE: reverses all the colors of the"
  49. 1330  PRINT"image.
  50. 1340  PRINT:PRINT"VIEW: removes all of the border to "
  51. 1350  PRINT"permit the image to fill the screen."
  52. 1360  PRINT:PRINT"QUIT: end the program.  Warning:"
  53. 1370  PRINT"This program doesn't ask `Are You Sure?'";
  54. 1380  LOCATE 25,11:PRINT"Press <SPACE BAR>";:LOCATE 1,1
  55. 1390  A$=INKEY$:IF A$<>" " THEN 1380
  56. 1395  CLS
  57. 1400  PRINT"Draw Plus terms: SPECIAL box"
  58. 1410  PRINT:PRINT"LINE COLOR: sets 1 of 4 different colors";
  59. 1420  PRINT"PAINT COLOR: sets 1 of 16 different fill";
  60. 1430  PRINT"colors."
  61. 1440  PRINT:PRINT"CUT+PASTE: grabs an image and puts it"
  62. 1450  PRINT"wherever you move it on the screen. PSET";
  63. 1460  PRINT"CUT+OVERLAP: grabs an image and overlaps";
  64. 1470  PRINT"it where you move it on the screen. XOR"
  65. 1480  PRINT"CUT+REMOVE: grabs and removes an image."
  66. 1490  PRINT:PRINT"Cyn/Mag/Wht: selects color palette 1"
  67. 1500  PRINT"Grn/Red/Brn: selects color palette 2"
  68. 1510  PRINT:PRINT"BRUSH SIZE: selects brush size for"
  69. 1520  PRINT"FATBRUSH and AIRBRUSH tools.
  70. 1530  PRINT:PRINT"Pattern RGB: selects set of paint colors";
  71. 1540  PRINT"that look better on RGB monitors."
  72. 1550  PRINT"Pattern CC: selects set of paint colors"
  73. 1560  PRINT"that look better on Color Composite"
  74. 1565  PRINT"monitors."
  75. 1570  LOCATE 25,11:PRINT"Press <SPACE BAR>";:LOCATE 1,1
  76. 1580  A$=INKEY$:IF A$<>" " THEN 1580
  77. 1590  CLS:GOTO 20
  78. 2000  CLS
  79. 2010  PRINT"Draw Plus instructions: pull-down menus"
  80. 2020  PRINT
  81. 2030  PRINT"    When the program starts the menu "
  82. 2040  PRINT"cursor is already active."
  83. 2050  PRINT"Move the joystick to the left or right "
  84. 2060  PRINT"to move the cursor.  To view a box with-";
  85. 2070  PRINT"out activating anything, hold down the "
  86. 2080  PRINT"RED button, don't move the joystick, and";
  87. 2090  PRINT"release the button when you want to move";
  88. 2100  PRINT"the menu cursor again.
  89. 2110  PRINT"    If you want to select anything from"
  90. 2120  PRINT"one of the boxes, move the cursor to "
  91. 2130  PRINT"that box, hold the RED button down, move";
  92. 2140  PRINT"the joystick up or down to move the"
  93. 2150  PRINT"cursor, and release the button when you"
  94. 2160  PRINT"have reached your choice.  All choices "
  95. 2170  PRINT"in the TOOLS and SPECIAL box take you to";
  96. 2180  PRINT"the draw screen (except ASCII).  If you"
  97. 2190  PRINT"decided not to use a feature in the box,";
  98. 2200  PRINT"move the cursor to the box title and "
  99. 2210  PRINT"release the button."
  100. 2215  LOCATE 25,11:PRINT"Press <SPACE BAR>";:LOCATE 1,1
  101. 2216  A$=INKEY$:IF A$<>" " THEN 2216
  102. 2217  CLS
  103. 2220  PRINT"    If you selected LINE COLOR or PAINT"
  104. 2230  PRINT"COLOR then you must move the joystick"
  105. 2240  PRINT"left or right to move the cursor and "
  106. 2250  PRINT"you must push the RED button to select"
  107. 2260  PRINT"the color the cursor is on."
  108. 2270  PRINT:PRINT"    Anytime when your on the draw screen";
  109. 2280  PRINT"you can return to the menu cursor by"
  110. 2290  PRINT"pushing the BLACK button.
  111. 2295  LOCATE 25,11:PRINT"Press <SPACE BAR>";:LOCATE 1,1
  112. 2300  A$=INKEY$:IF A$<>" " THEN 2300
  113. 2310  CLS
  114. 2320  PRINT"Draw Plus instructions: draw screen"
  115. 2330  PRINT
  116. 2340  PRINT"    To activate the selected feature, "
  117. 2350  PRINT"you must press the RED button.  The "
  118. 2360  PRINT"length and amount of times you must do "
  119. 2370  PRINT"so depends on the feature."
  120. 2380  PRINT"    For the DRAW, FATBRUSH, and AIRBRUSH";
  121. 2390  PRINT"features, you must hold down the RED"
  122. 2400  PRINT"button as long as you want the pen down.";
  123. 2410  PRINT"    For the LINE feature, you must tap "
  124. 2420  PRINT"the RED button once to set the first "
  125. 2430  PRINT"point and tap it again to draw the line"
  126. 2440  PRINT"to the point that the cursor has been "
  127. 2450  PRINT"moved to."
  128. 2460  PRINT"    For the BOX feature and CUT features";
  129. 2470  PRINT"you must tap the RED button once to plot";
  130. 2480  PRINT"one end of the diagnol and tap it again"
  131. 2490  PRINT"to plot the box or get the image."
  132. 2500  PRINT"In cutting images you must first mark "
  133. 2510  PRINT"the upper left corner.  In CUT+PASTE and";
  134. 2515  LOCATE 25,11:PRINT"Press <SPACE BAR>";:LOCATE 1,1
  135. 2516  A$=INKEY$:IF A$<>" " THEN 2516
  136. 2517  CLS
  137. 2520  PRINT"the upper left corner.  In CUT+PASTE and";
  138. 2521  PRINT"CUT+OVERLAP, the third time you tap the"
  139. 2530  PRINT"button activates the feature and you "
  140. 2540  PRINT"must hit the BLACK button to stop the"
  141. 2550  PRINT"feature.  In CUT+REMOVE, the third tap"
  142. 2560  PRINT"removes the image and resets the"
  143. 2570  PRINT"feature."
  144. 2580  PRINT"    For the CIRCLE feature, tap the RED"
  145. 2590  PRINT"button once to mark the center and move"
  146. 2600  PRINT"the joystick either horizontal or "
  147. 2610  PRINT"vertical until you have a desirable "
  148. 2620  PRINT"radius.  Tap the RED button again to "
  149. 2630  PRINT"draw the circle."
  150. 2670  LOCATE 25,11:PRINT"Press <SPACE BAR>";:LOCATE 1,1
  151. 2680  A$=INKEY$:IF A$<>" " THEN 2680
  152. 2690  CLS
  153. 2700  PRINT"Draw Plus instructions: printing screens";
  154. 2710  PRINT
  155. 2720  PRINT"Note: the menu cursor must be active for";
  156. 2730  PRINT"the following features and it must be"
  157. 2740  PRINT"placed on the SCREEN box."
  158. 2750  PRINT
  159. 2760  PRINT"To print a screen follow the following"
  160. 2770  PRINT"instructions:"
  161. 2780  PRINT
  162. 2785  PRINT"1. SAVE image, go to DOS, and turn on "
  163. 2786  PRINT"   the printer."
  164. 2790  PRINT"2. Load GRAPHICS.COM from DOS 2.1 disk"
  165. 2800  PRINT"3. Load BASICA DRAWPLUS from DOS"
  166. 2805  PRINT"   LOAD the image (SCREEN box)"
  167. 2810  PRINT"4. Select INVERSE feature (SCREEN box)"
  168. 2820  PRINT"5. Select VIEW feature (SCREEN box)"
  169. 2830  PRINT"6. Hit <Shift> and the <PrtSc> key"
  170. 2840  PRINT"7. When printer stops, hit BLACK button"
  171. 2850  PRINT"   to escape from VIEW mode."
  172. 2860  PRINT"8. Select INVERSE (SCREEN box) to return";
  173. 2870  PRINT"   the image to normal."
  174. 2875  LOCATE 25,11:PRINT"Press <SPACE BAR>";:LOCATE 1,1
  175. 2880  A$=INKEY$:IF A$<>" " THEN 2880
  176. 2890  CLS:GOTO 20
  177. 11000  CLS:PRINT"PRINTING...."
  178. 11010  LPRINT CHR$(27)CHR$(69)CHR$(27)CHR$(71)"Draw Plus terms: TOOLS box"
  179. 11020  LPRINT CHR$(27)CHR$(70)CHR$(27)CHR$(72)
  180. 11030  LPRINT"DRAW: pixel by pixel art"
  181. 11040  LPRINT:LPRINT"FATBRUSH: solid square of pixels.  Size"
  182. 11050  LPRINT"set by BRUSH SIZE."
  183. 11060  LPRINT:LPRINT"AIRBRUSH: random pixel by pixel art "
  184. 11070  LPRINT"spread in a square area which size is "
  185. 11080  LPRINT"set by BRUSH SIZE."
  186. 11090  LPRINT:LPRINT"CIRCLE: draws a circle."
  187. 11100  LPRINT:LPRINT"LINE: draws a line between two points."
  188. 11110  LPRINT:LPRINT"BOX: draws a box."
  189. 11120  LPRINT:LPRINT"Note: all above items color is set by"
  190. 11130  LPRINT"LINE COLOR."
  191. 11140  LPRINT:LPRINT"PAINT: fills in area with border color "
  192. 11150  LPRINT"set by LINE COLOR and fill color set by"
  193. 11160  LPRINT"PAINT COLOR."
  194. 11200  LPRINT:LPRINT CHR$(27)CHR$(69)CHR$(27)CHR$(71)"Draw Plus terms: SCREEN box"
  195. 11201  LPRINT CHR$(27)CHR$(70)CHR$(27)CHR$(72)
  196. 11210  LPRINT"UNDO: restores the screen as it was"
  197. 11220  LPRINT"before you made any changes."
  198. 11240  LPRINT:LPRINT"LOAD: loads an image from the disk. The"
  199. 11250  LPRINT"image must have an extention of PIC."
  200. 11260  LPRINT:LPRINT"SAVE: stores an image to the disk.  The"
  201. 11270  LPRINT"filename will have an extention of PIC."
  202. 11290  LPRINT:LPRINT"CLEAR: clears the screen.  Warning: "
  203. 11300  LPRINT"once the image is erased, you can't UNDO"
  204. 11310  LPRINT"it."
  205. 11320  LPRINT:LPRINT"INVERSE: reverses all the colors of the"
  206. 11330  LPRINT"image.
  207. 11340  LPRINT:LPRINT"VIEW: removes all of the border to "
  208. 11350  LPRINT"permit the image to fill the screen."
  209. 11360  LPRINT:LPRINT"QUIT: end the program.  Warning:"
  210. 11370  LPRINT"This program doesn't ask `Are You Sure?'"
  211. 11400  LPRINT:LPRINT CHR$(27)CHR$(69)CHR$(27)CHR$(71)"Draw Plus terms: SPECIAL box"
  212. 11401  LPRINT CHR$(27)CHR$(70)CHR$(27)CHR$(72)
  213. 11410  LPRINT"LINE COLOR: sets 1 of 4 different colors"
  214. 11420  LPRINT"PAINT COLOR: sets 1 of 16 different fill"
  215. 11430  LPRINT"colors."
  216. 11440  LPRINT:LPRINT"CUT+PASTE: grabs an image and puts it"
  217. 11450  LPRINT"wherever you move it on the screen. PSET"
  218. 11460  LPRINT"CUT+OVERLAP: grabs an image and overlaps"
  219. 11470  LPRINT"it where you move it on the screen. XOR"
  220. 11480  LPRINT"CUT+REMOVE: grabs and removes an image."
  221. 11490  FOR I=1 TO 7:LPRINT:NEXT I
  222. 11500  LPRINT:LPRINT"Cyn/Mag/Wht: selects color palette 1"
  223. 11501  LPRINT"Grn/Red/Brn: selects color palette 2"
  224. 11510  LPRINT:LPRINT"BRUSH SIZE: selects brush size for"
  225. 11520  LPRINT"FATBRUSH and AIRBRUSH tools.
  226. 11530  LPRINT:LPRINT"Pattern RGB: selects set of paint colors"
  227. 11540  LPRINT"that look better on RGB monitors."
  228. 11550  LPRINT"Pattern CC: selects set of paint colors"
  229. 11560  LPRINT"that look better on Color Composite"
  230. 11565  LPRINT"monitors."
  231. 11566  FOR I=1 TO 55:LPRINT:NEXT I:REM END PAGE 2
  232. 12010  LPRINT CHR$(27)CHR$(69)CHR$(27)CHR$(71)"Draw Plus instructions: pull-down menus"
  233. 12011  LPRINT CHR$(27)CHR$(70)CHR$(27)CHR$(72)
  234. 12030  LPRINT"    When the program starts the menu "
  235. 12040  LPRINT"cursor is already active."
  236. 12050  LPRINT"Move the joystick to the left or right "
  237. 12060  LPRINT"to move the cursor.  To view a box with-"
  238. 12070  LPRINT"out activating anything, hold down the "
  239. 12080  LPRINT"RED button, don't move the joystick, and"
  240. 12090  LPRINT"release the button when you want to move"
  241. 12100  LPRINT"the menu cursor again.
  242. 12110  LPRINT"    If you want to select anything from"
  243. 12120  LPRINT"one of the boxes, move the cursor to "
  244. 12130  LPRINT"that box, hold the RED button down, move"
  245. 12140  LPRINT"the joystick up or down to move the"
  246. 12150  LPRINT"cursor, and release the button when you"
  247. 12160  LPRINT"have reached your choice.  All choices "
  248. 12170  LPRINT"in the TOOLS and SPECIAL box take you to"
  249. 12180  LPRINT"the draw screen (except ASCII).  If you"
  250. 12190  LPRINT"decided not to use a feature in the box,"
  251. 12200  LPRINT"move the cursor to the box title and "
  252. 12210  LPRINT"release the button."
  253. 12220  LPRINT"    If you selected LINE COLOR or PAINT"
  254. 12230  LPRINT"COLOR then you must move the joystick"
  255. 12240  LPRINT"left or right to move the cursor and "
  256. 12250  LPRINT"you must push the RED button to select"
  257. 12260  LPRINT"the color the cursor is on."
  258. 12270  LPRINT"    Anytime when your on the draw screen"
  259. 12280  LPRINT"you can return to the menu cursor by"
  260. 12290  LPRINT"pushing the BLACK button.
  261. 12320  LPRINT:LPRINT CHR$(27)CHR$(69)CHR$(27)CHR$(71)"Draw Plus instructions: draw screen"
  262. 12330  LPRINT CHR$(27)CHR$(70)CHR$(27)CHR$(72)
  263. 12340  LPRINT"    To activate the selected feature, "
  264. 12350  LPRINT"you must press the RED button.  The "
  265. 12360  LPRINT"length and amount of times you must do "
  266. 12370  LPRINT"so depends on the feature."
  267. 12380  LPRINT"    For the DRAW, FATBRUSH, and AIRBRUSH"
  268. 12390  LPRINT"features, you must hold down the RED"
  269. 12400  LPRINT"button as long as you want the pen down."
  270. 12410  LPRINT"    For the LINE feature, you must tap "
  271. 12420  LPRINT"the RED button once to set the first "
  272. 12430  LPRINT"point and tap it again to draw the line"
  273. 12440  LPRINT"to the point that the cursor has been "
  274. 12450  LPRINT"moved to."
  275. 12460  LPRINT"    For the BOX feature and CUT features"
  276. 12470  LPRINT"you must tap the RED button once to plot"
  277. 12480  LPRINT"one end of the diagnol and tap it again"
  278. 12490  LPRINT"to plot the box or get the image."
  279. 12500  LPRINT"In cutting images you must first mark "
  280. 12520  LPRINT"the upper left corner.  In CUT+PASTE and"
  281. 12521  LPRINT"CUT+OVERLAP, the third time you tap the"
  282. 12530  LPRINT"button activates the feature and you "
  283. 12540  LPRINT"must hit the BLACK button to stop the"
  284. 12550  LPRINT"feature.  In CUT+REMOVE, the third tap"
  285. 12560  LPRINT"removes the image and resets the"
  286. 12570  LPRINT"feature."
  287. 12580  LPRINT"    For the CIRCLE feature, tap the RED"
  288. 12590  LPRINT"button once to mark the center and move"
  289. 12600  LPRINT"the joystick either horizontal or "
  290. 12610  FOR I=1 TO 7:LPRINT:NEXT I
  291. 12620  LPRINT"vertical until you have a desirable "
  292. 12621  LPRINT"radius.  Tap the RED button again to "
  293. 12630  LPRINT"draw the circle."
  294. 12640  LPRINT
  295. 12700  LPRINT:LPRINT CHR$(27)CHR$(69)CHR$(27)CHR$(71)"Draw Plus instructions: printing screens"
  296. 12710  LPRINT CHR$(27)CHR$(70)CHR$(27)CHR$(72)
  297. 12720  LPRINT"Note: the menu cursor must be active for"
  298. 12730  LPRINT"the following features and it must be"
  299. 12740  LPRINT"placed on the SCREEN box."
  300. 12750  LPRINT
  301. 12760  LPRINT"To print a screen follow the following"
  302. 12770  LPRINT"instructions:"
  303. 12780  LPRINT
  304. 12785  LPRINT"1. SAVE image, go to DOS, and turn on "
  305. 12786  LPRINT"   the printer."
  306. 12790  LPRINT"2. Load GRAPHICS.COM from DOS 2.1 disk"
  307. 12800  LPRINT"3. Load BASICA DRAWPLUS from DOS"
  308. 12805  LPRINT"   LOAD the image (SCREEN box)"
  309. 12810  LPRINT"4. Select INVERSE feature (SCREEN box)"
  310. 12820  LPRINT"5. Select VIEW feature (SCREEN box)"
  311. 12830  LPRINT"6. Hit <Shift> and the <PrtSc> key"
  312. 12840  LPRINT"7. When printer stops, hit BLACK button"
  313. 12850  LPRINT"   to escape from VIEW mode."
  314. 12860  LPRINT"8. Select INVERSE (SCREEN box) to return"
  315. 12870  LPRINT"   the image to normal."
  316. 12871  FOR I=1 TO 40:LPRINT:NEXT I
  317. 12890  CLS:GOTO 20
  318.